#include "LecteurSymbole.h"
#include <ctype.h>
#include <string.h>
#include <iostream>
using namespace std;

////////////////////////////////////////////////////////////////////////////////

LecteurSymbole::LecteurSymbole(string nomFich) :
lc(nomFich), symCour("") {
    suivant(); // pour lire le premier symbole
}

////////////////////////////////////////////////////////////////////////////////

void LecteurSymbole::suivant() {
    sauterSeparateurs();
    while (lc.getCarCour() == '#'){
        sauterCommentaire();
        sauterSeparateurs();
    }
    // on est maintenant positionne sur le premier caractère d'un symbole
    ligne = lc.getLigne();
    colonne = lc.getColonne();
    symCour = Symbole(motSuivant()); // on reconstruit symCour avec le nouveau mot lu
}

////////////////////////////////////////////////////////////////////////////////

void LecteurSymbole::sauterSeparateurs() {
    while (lc.getCarCour() == ' ' ||
            lc.getCarCour() == '\t' ||
            lc.getCarCour() == '\r' ||
            lc.getCarCour() == '\n')
        lc.suivant();
}

////////////////////////////////////////////////////////////////////////////////

void LecteurSymbole::sauterCommentaire(){
    if (lc.getCarCour()=='#')
        while (lc.getCarCour() != '\n' && lc.getCarCour() != '\r')
            lc.suivant();
}

////////////////////////////////////////////////////////////////////////////////

string LecteurSymbole::motSuivant() {
    static string s;
    s = "";
    // c'est le début d'un entier
    if (isdigit(lc.getCarCour()))
        do {
            s = s + lc.getCarCour();
            lc.suivant();
        } while (isdigit(lc.getCarCour()));
    // c'est le début d'un mot
    else if (isalpha(lc.getCarCour()))
        do {
            s = s + lc.getCarCour();
            lc.suivant();
        } while (isalpha(lc.getCarCour()) ||
                isdigit(lc.getCarCour()) ||
                lc.getCarCour() == '_');
    // C'est une chaine
    else if (lc.getCarCour() == '"') {
        do {
            s = s + lc.getCarCour();
            lc.suivant();
        } while (lc.getCarCour() != '"' && lc.getCarCour() != EOF);
        if (lc.getCarCour() == '"'){
             s += '"';
             lc.suivant();
        }
    // c'est un op de comparaison / affectation
    } else if (lc.getCarCour() == '<' || lc.getCarCour() == '>' ||
               lc.getCarCour() == '!' || lc.getCarCour() == '='  || lc.getCarCour()=='+' || lc.getCarCour()=='-')
    {
        do{
            s += lc.getCarCour();
            lc.suivant();
        } while (lc.getCarCour() == '=' || lc.getCarCour()=='+' || lc.getCarCour()=='-');
    // c'est un caractère spécial
    } else if (lc.getCarCour() != EOF)
    {
        s = lc.getCarCour();
        lc.suivant();
    }
    return s;
}